home *** CD-ROM | disk | FTP | other *** search
/ Graphics Plus / Graphics Plus.iso / general / modelers / linkedit / linkedit.lha / link-edit / LinkEdit / Choose / command.c < prev    next >
Encoding:
C/C++ Source or Header  |  1991-03-13  |  4.6 KB  |  200 lines
  1. #include <stdio.h>
  2.  
  3. void
  4. cutnewline(line)
  5.   char *line;
  6. { 
  7.   int n=strlen(line); 
  8.   if (n>0 && line[n-1]=='\n' && !(line==NULL)) line[n-1]='\0';
  9.   /*fprintf(stderr,"%s %d \n",line,strlen(line));*/
  10. }
  11.  
  12. main(argc,argv)
  13.   int argc;
  14.   char **argv;
  15. { int i,write=0;
  16.   int namesc=0,scount=0;
  17.   char **namesv;
  18.   char *dr;
  19.   FILE *fp,*fin;
  20.   char line[100];
  21.   fp=stdout;
  22.   dr=(char *)malloc(3*sizeof(char));
  23.   strcpy(dr,".");
  24.   *argv++; argc--;
  25.   while (argc-->0)
  26.   {
  27.     if (strcmp(*argv,"-w")==0 || strcmp(*argv,"-write")==0) 
  28.     {
  29.       write=1;
  30.       *argv++;
  31.       continue;
  32.     }
  33.  
  34.     if (strcmp(*argv,"-show")==0 || strcmp(*argv,"-showdir")==0) 
  35.     {
  36.       showdir(1);
  37.       *argv++;
  38.       continue;
  39.     }
  40.  
  41.     if (strcmp(*argv,"-no")==0 || strcmp(*argv,"-noshowdir")==0) 
  42.     {
  43.       showdir(0);
  44.       *argv++;
  45.       continue;
  46.     }
  47.  
  48.     if (strcmp(*argv,"-r")==0 || strcmp(*argv,"-read")==0) 
  49.     {
  50.       write=0;
  51.       *argv++;
  52.       continue;
  53.     }
  54.     if (strcmp(*argv,"-d")==0 || strcmp(*argv,"-dir")==0)
  55.     { 
  56.       *argv++;
  57.       if (argc-->0) 
  58.       {
  59.         free(dr);
  60.         dr=(char *)malloc((strlen(*argv)+2)*sizeof(char));
  61.         strcpy(dr,*argv);
  62.         *argv++;
  63.         continue;
  64.       }
  65.       else
  66.       {
  67.         fprintf(stderr,"directory name not specified\n");
  68.         exit(1);
  69.       }
  70.     }
  71.  
  72.     if (strcmp(*argv,"-n")==0 || strcmp(*argv,"-names")==0)
  73.     {
  74.       if (argc-->0) 
  75.       { *argv++;
  76.         namesc=atoi(*argv);
  77.         if (namesc==0 && (*argv[0]<'0' || *argv[0]>'9')) 
  78.         {
  79.           if (*argv[0]=='-') fin=stdin; else fin=fopen(*argv,"r");
  80.           if (fin==NULL) 
  81.           {
  82.             fprintf(stderr,"Can't open the file %s \n",*argv);
  83.             exit(1);
  84.           }
  85.           if (fgets(line,100,fin)==NULL) 
  86.           { 
  87.             fprintf(stderr,"file is empty! \n");
  88.             exit(1);
  89.           }
  90.           cutnewline(line);
  91.           namesc=atoi(line);
  92.           namesv=(char **)malloc(namesc*sizeof(char *));
  93.           for(i=0; i<namesc; i++)
  94.           {
  95.             if (fgets(line,100,fin)==NULL) 
  96.             { fprintf(stderr,"missing file data"); namesc=i-1;}
  97.             else 
  98.             {
  99.               cutnewline(line);
  100.               *(namesv+i)=(char *)malloc((strlen(line)+2)*sizeof(char));
  101.               strcpy(*(namesv+i),line); 
  102.             }
  103.           }
  104.           if (!(fgets(line,100,fin)==NULL) && !(line[0]=='(')) 
  105.           {
  106.             cutnewline(line);           
  107.             free(dr);
  108.             dr=(char *)malloc((strlen(line)+2)*sizeof(char));
  109.             strcpy(dr,line);
  110.           }          
  111.           *argv++; 
  112.           fclose(fin);
  113.           continue;
  114.         }
  115.         namesv=(char **)malloc(namesc*sizeof(char *));
  116.         *argv++;
  117.         for(i=0; i<namesc; i++)
  118.           if (argc-->0)
  119.           {
  120.             *(namesv+i)=(char *)malloc((strlen(*argv)+2)*sizeof(char));
  121.             strcpy(*(namesv+i),*argv); 
  122.             *argv++;
  123.           }
  124.           else
  125.           {
  126.             fprintf(stderr,"not enough file names\n");
  127.             exit(1);
  128.           }
  129.         continue;
  130.       }
  131.       else
  132.       {
  133.         fprintf(stderr,"no number of files specified\n");
  134.         exit(1);
  135.       }
  136.     }
  137.     if (strcmp(*argv,"-s")==0 || strcmp(*argv,"-suffix")==0)
  138.     {
  139.       if (argc-->0) 
  140.       { *argv++;
  141.         scount=atoi(*argv);
  142.         if (scount==0 && (*argv[0]<'0' || *argv[0]>'9')) 
  143.         {
  144.           if (*argv[0]=='-') fin=stdin; else fin=fopen(*argv,"r");
  145.           if (fin==NULL) 
  146.           {
  147.             fprintf(stderr,"Can't open the file %s \n",*argv);
  148.             exit(1);
  149.           }
  150.           if (fgets(line,100,fin)==NULL) 
  151.           { 
  152.             fprintf(stderr,"file is empty! \n");
  153.             exit(1);
  154.           }
  155.           cutnewline(line);
  156.           scount=atoi(line);
  157.           for(i=0; i<scount; i++)
  158.           {
  159.             if (fgets(line,100,fin)==NULL) 
  160.               fprintf(stderr,"missing file data"); 
  161.             else 
  162.             {
  163.               cutnewline(line);
  164.               addsuff(line); 
  165.             }
  166.           }          
  167.           *argv++; 
  168.           fclose(fin);
  169.           continue;
  170.         }
  171.  
  172.         *argv++;
  173.         for(i=0; i<scount; i++)
  174.           if (argc-->0)
  175.           {  
  176.             addsuff(*argv);
  177.             *argv++;
  178.           }
  179.           else
  180.           {
  181.             fprintf(stderr,"not enough suffix names\n");
  182.             exit(1);
  183.           }
  184.         continue;
  185.       }
  186.       else
  187.       {
  188.         fprintf(stderr,"no number of suffixes specified\n");
  189.         exit(1);
  190.       }
  191.     }
  192.  
  193.   }
  194.   choosefile(&namesc,&namesv,&dr,dr,write);
  195.   fprintf(fp,"%d\n", namesc);
  196.   for(i=0; i<namesc; i++)
  197.     fprintf(fp,"%s\n", *(namesv+i));
  198.   fprintf(fp,"%s\n",dr);
  199.   chfree(&namesc,&namesv);
  200. }